home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Publication 50
/
Publication_50_2003_Civitas_de_Disk_2_of_2_Side_B.d64
/
bas5x6 1
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2023-02-26
|
104b
|
8 lines
10 a=18432
20 b=1
30 poke53272,24
40 fori=0to5:forx=0to4
50 poke1024+i*40+x,peek(a+i*256+b*5+x)
60 nextx
70 nexti